home *** CD-ROM | disk | FTP | other *** search
/ Delphi Magazine Collection 2001 / Delphi Magazine Collection 20001 (2001).iso / Bonus / Plasmatech / ptscp_eval.exe / %MAINDIR% / EvalC3 / UPTFrame.hpp < prev    next >
Encoding:
C/C++ Source or Header  |  2001-08-31  |  8.1 KB  |  222 lines
  1. // Borland C++ Builder
  2. // Copyright (c) 1995, 1998 by Borland International
  3. // All rights reserved
  4.  
  5. // (DO NOT EDIT: machine generated header) 'UPTFrame.pas' rev: 3.00
  6.  
  7. #ifndef UPTFrameHPP
  8. #define UPTFrameHPP
  9. #include <Menus.hpp>
  10. #include <Dialogs.hpp>
  11. #include <Forms.hpp>
  12. #include <Controls.hpp>
  13. #include <Graphics.hpp>
  14. #include <Classes.hpp>
  15. #include <SysUtils.hpp>
  16. #include <Messages.hpp>
  17. #include <Windows.hpp>
  18. #include <SysInit.hpp>
  19. #include <System.hpp>
  20.  
  21. //-- user supplied -----------------------------------------------------------
  22.  
  23. namespace Uptframe
  24. {
  25. //-- type declarations -------------------------------------------------------
  26. enum TPTFrameStyle { ptfsNone, ptfsGroup, ptfsLowered, ptfsRaised, ptfsDint, ptfsBump, ptfsSingle, ptfsHorzLine, 
  27.     ptfsHorzEdge, ptfsVertLine, ptfsVertEdge };
  28.  
  29. typedef void __fastcall (__closure *TPTFramePaintEvent)(System::TObject* aSender, Graphics::TCanvas* 
  30.     aCanvas);
  31.  
  32. class DELPHICLASS TPTCustomGroup;
  33. class PASCALIMPLEMENTATION TPTCustomGroup : public Controls::TCustomControl 
  34. {
  35.     typedef Controls::TCustomControl inherited;
  36.     
  37. private:
  38.     HIDESBASE MESSAGE void __fastcall CMEnabledChanged(Messages::TMessage &msg);
  39.     MESSAGE void __fastcall CMTextChanged(Messages::TMessage &aMsg);
  40.     HIDESBASE MESSAGE void __fastcall CMColorChanged(Messages::TMessage &aMsg);
  41.     HIDESBASE MESSAGE void __fastcall CMFontChanged(Messages::TMessage &aMsg);
  42.     void __fastcall SetAlignment(Classes::TAlignment aValue);
  43.     void __fastcall SetFrameSpace(int aValue);
  44.     void __fastcall SetFrameStyle(TPTFrameStyle aValue);
  45.     HIDESBASE MESSAGE void __fastcall WMEraseBkgnd(Messages::TWMEraseBkgnd &aMsg);
  46.     MESSAGE void __fastcall WMNcCalcSize(Messages::TWMNCCalcSize &aMsg);
  47.     MESSAGE void __fastcall WMNcPaint(Messages::TWMNoParams &aMsg);
  48.     
  49. protected:
  50.     TAlignment mAlignment;
  51.     bool mDefaultDrawing;
  52.     int mFrameSpace;
  53.     bool mFrameChanged;
  54.     TPTFrameStyle mFrameStyle;
  55.     TPTFramePaintEvent mOnPaint;
  56.     virtual void __fastcall CreateParams(Controls::TCreateParams &Params);
  57.     void __fastcall RepaintNonClient(void);
  58.     virtual void __fastcall PaintNonClient(Graphics::TCanvas* c, const Windows::TRect &aBoundsRect);
  59.     virtual void __fastcall Paint(void);
  60.     __property Classes::TAlignment Alignment = {read=mAlignment, write=SetAlignment, default=2};
  61.     __property bool DefaultDrawing = {read=mDefaultDrawing, write=mDefaultDrawing, default=1};
  62.     __property int FrameSpace = {read=mFrameSpace, write=SetFrameSpace, default=2};
  63.     __property TPTFrameStyle FrameStyle = {read=mFrameStyle, write=SetFrameStyle, default=1};
  64.     __property TPTFramePaintEvent OnPaint = {read=mOnPaint, write=mOnPaint};
  65.     __property Width ;
  66.     __property Height ;
  67.     
  68. public:
  69.     __fastcall virtual TPTCustomGroup(Classes::TComponent* aOwner);
  70.     void __fastcall EnableAllChildren(bool afEnable);
  71. public:
  72.     /* TCustomControl.Destroy */ __fastcall virtual ~TPTCustomGroup(void) { }
  73.     
  74. public:
  75.     /* TWinControl.CreateParented */ __fastcall TPTCustomGroup(HWND ParentWindow) : Controls::TCustomControl(
  76.         ParentWindow) { }
  77.     
  78. };
  79.  
  80. class DELPHICLASS TPTGroup;
  81. class PASCALIMPLEMENTATION TPTGroup : public Uptframe::TPTCustomGroup 
  82. {
  83.     typedef Uptframe::TPTCustomGroup inherited;
  84.     
  85. __published:
  86.     __property Alignment ;
  87.     __property DefaultDrawing ;
  88.     __property FrameSpace ;
  89.     __property FrameStyle ;
  90.     __property Align ;
  91.     __property Caption ;
  92.     __property Color ;
  93.     __property Font ;
  94.     __property Enabled ;
  95.     __property ParentColor ;
  96.     __property ParentFont ;
  97.     __property ParentShowHint ;
  98.     __property PopupMenu ;
  99.     __property ShowHint ;
  100.     __property Visible ;
  101.     __property Width ;
  102.     __property Height ;
  103.     __property TabOrder ;
  104.     __property OnClick ;
  105.     __property OnDblClick ;
  106.     __property OnMouseDown ;
  107.     __property OnMouseMove ;
  108.     __property OnMouseUp ;
  109.     __property OnEnter ;
  110.     __property OnExit ;
  111.     __property OnPaint ;
  112. public:
  113.     /* TPTCustomGroup.Create */ __fastcall virtual TPTGroup(Classes::TComponent* aOwner) : Uptframe::TPTCustomGroup(
  114.         aOwner) { }
  115.     
  116. public:
  117.     /* TCustomControl.Destroy */ __fastcall virtual ~TPTGroup(void) { }
  118.     
  119. public:
  120.     /* TWinControl.CreateParented */ __fastcall TPTGroup(HWND ParentWindow) : Uptframe::TPTCustomGroup(
  121.         ParentWindow) { }
  122.     
  123. };
  124.  
  125. class DELPHICLASS TPTCustomFrame;
  126. class PASCALIMPLEMENTATION TPTCustomFrame : public Controls::TGraphicControl 
  127. {
  128.     typedef Controls::TGraphicControl inherited;
  129.     
  130. protected:
  131.     TAlignment mAlignment;
  132.     bool mDefaultDrawing;
  133.     int mFrameSpace;
  134.     TPTFrameStyle mFrameStyle;
  135.     TPTFramePaintEvent mOnPaint;
  136.     void __fastcall SetAlignment(Classes::TAlignment aValue);
  137.     void __fastcall SetFrameSpace(int aValue);
  138.     void __fastcall SetFrameStyle(TPTFrameStyle aValue);
  139.     MESSAGE void __fastcall CMTextChanged(Messages::TMessage &aMsg);
  140.     HIDESBASE MESSAGE void __fastcall CMColorChanged(Messages::TMessage &aMsg);
  141.     HIDESBASE MESSAGE void __fastcall CMFontChanged(Messages::TMessage &aMsg);
  142.     void __fastcall InvalidateInterior(void);
  143.     virtual void __fastcall Paint(void);
  144.     __property Classes::TAlignment Alignment = {read=mAlignment, write=SetAlignment, default=2};
  145.     __property bool DefaultDrawing = {read=mDefaultDrawing, write=mDefaultDrawing, default=1};
  146.     __property int FrameSpace = {read=mFrameSpace, write=SetFrameSpace, default=2};
  147.     __property TPTFrameStyle FrameStyle = {read=mFrameStyle, write=SetFrameStyle, default=2};
  148.     __property Width ;
  149.     __property Height ;
  150.     __property TPTFramePaintEvent OnPaint = {read=mOnPaint, write=mOnPaint};
  151.     
  152. public:
  153.     __fastcall virtual TPTCustomFrame(Classes::TComponent* aOwner);
  154. public:
  155.     /* TGraphicControl.Destroy */ __fastcall virtual ~TPTCustomFrame(void) { }
  156.     
  157. };
  158.  
  159. class DELPHICLASS TPTFrame;
  160. class PASCALIMPLEMENTATION TPTFrame : public Uptframe::TPTCustomFrame 
  161. {
  162.     typedef Uptframe::TPTCustomFrame inherited;
  163.     
  164. __published:
  165.     __property Alignment ;
  166.     __property DefaultDrawing ;
  167.     __property FrameSpace ;
  168.     __property FrameStyle ;
  169.     __property OnPaint ;
  170.     __property Align ;
  171.     __property Caption ;
  172.     __property Color ;
  173.     __property Font ;
  174.     __property ParentColor ;
  175.     __property ParentFont ;
  176.     __property ParentShowHint ;
  177.     __property PopupMenu ;
  178.     __property ShowHint ;
  179.     __property Visible ;
  180.     __property Width ;
  181.     __property Height ;
  182.     __property OnClick ;
  183.     __property OnDblClick ;
  184.     __property OnMouseDown ;
  185.     __property OnMouseMove ;
  186.     __property OnMouseUp ;
  187. public:
  188.     /* TPTCustomFrame.Create */ __fastcall virtual TPTFrame(Classes::TComponent* aOwner) : Uptframe::TPTCustomFrame(
  189.         aOwner) { }
  190.     
  191. public:
  192.     /* TGraphicControl.Destroy */ __fastcall virtual ~TPTFrame(void) { }
  193.     
  194. };
  195.  
  196. //-- var, const, procedure ---------------------------------------------------
  197. extern PACKAGE void __fastcall DrawLoweredFrame(Graphics::TCanvas* c, const Windows::TRect &r);
  198. extern PACKAGE void __fastcall DrawRaisedFrame(Graphics::TCanvas* c, const Windows::TRect &r);
  199. extern PACKAGE void __fastcall DrawDintFrame(Graphics::TCanvas* c, const Windows::TRect &r);
  200. extern PACKAGE void __fastcall DrawBumpFrame(Graphics::TCanvas* c, const Windows::TRect &r);
  201. extern PACKAGE void __fastcall DrawSingleFrame(Graphics::TCanvas* c, const Windows::TRect &r);
  202. extern PACKAGE void __fastcall DrawGroupFrame(Graphics::TCanvas* c, const Windows::TRect &ar, const 
  203.     System::AnsiString caption, Graphics::TColor color, bool enabled);
  204. extern PACKAGE void __fastcall DrawVertLine(Graphics::TCanvas* c, const Windows::TRect &r, Graphics::TColor 
  205.     c1, Graphics::TColor c2);
  206. extern PACKAGE void __fastcall DrawVertEdge(Graphics::TCanvas* c, const Windows::TRect &r, Graphics::TColor 
  207.     c1, Graphics::TColor c2);
  208. extern PACKAGE void __fastcall DrawHorzLine(Graphics::TCanvas* c, const Windows::TRect &r, Graphics::TColor 
  209.     c1, Graphics::TColor c2);
  210. extern PACKAGE void __fastcall DrawHorzEdge(Graphics::TCanvas* c, const Windows::TRect &r, Graphics::TColor 
  211.     c1, Graphics::TColor c2);
  212. extern PACKAGE void __fastcall DrawFrame(TPTFrameStyle fs, Graphics::TCanvas* c, const Windows::TRect 
  213.     &r);
  214. extern PACKAGE void __fastcall AdjustRectForFrame(TPTFrameStyle fs, Windows::TRect &r);
  215.  
  216. }    /* namespace Uptframe */
  217. #if !defined(NO_IMPLICIT_NAMESPACE_USE)
  218. using namespace Uptframe;
  219. #endif
  220. //-- end unit ----------------------------------------------------------------
  221. #endif    // UPTFrame
  222.